object frmLancamentosContasPagar: TfrmLancamentosContasPagar
  Left = 234
  Top = 94
  Caption = 'Contas a Pagar'
  ClientHeight = 568
  ClientWidth = 1032
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsMDIChild
  KeyPreview = True
  OldCreateOrder = False
  Visible = True
  OnClose = FormClose
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 13
  object PageControlLancamentos: TPageControl
    Left = 0
    Top = 0
    Width = 1032
    Height = 568
    ActivePage = TabSheet2
    Align = alClient
    TabOrder = 0
    object TabSheet2: TTabSheet
      Caption = 'Consulta Lan'#231'amentos do Contas a Pagar'
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 1024
        Height = 73
        Align = alTop
        Caption = 'Filtros'
        TabOrder = 0
        object Label10: TLabel
          Left = 738
          Top = 14
          Width = 46
          Height = 13
          Caption = 'Descri'#231#227'o'
        end
        object Label5: TLabel
          Left = 492
          Top = 14
          Width = 36
          Height = 13
          Caption = 'Per'#237'odo'
        end
        object Label11: TLabel
          Left = 590
          Top = 35
          Width = 16
          Height = 13
          Caption = 'at'#233
        end
        object edtTapdescr: TEdit
          Left = 738
          Top = 30
          Width = 175
          Height = 21
          TabOrder = 4
        end
        object btnFiltrar: TJvImgBtn
          Left = 936
          Top = 28
          Width = 75
          Height = 25
          Caption = 'Filtrar'
          ImageIndex = 3
          Images = frmPrincipal.ImageList16
          TabOrder = 5
          OnClick = btnFiltrarClick
          HotTrackFont.Charset = DEFAULT_CHARSET
          HotTrackFont.Color = clWindowText
          HotTrackFont.Height = -11
          HotTrackFont.Name = 'Tahoma'
          HotTrackFont.Style = []
        end
        object rgSituacao: TRadioGroup
          Left = 10
          Top = 16
          Width = 231
          Height = 43
          Caption = 'Situa'#231#227'o'
          Columns = 3
          ItemIndex = 1
          Items.Strings = (
            'Pagas'
            'N'#227'o pagas'
            'Todas')
          TabOrder = 0
        end
        object rgPeriodo: TRadioGroup
          Left = 247
          Top = 16
          Width = 234
          Height = 43
          Caption = 'Tipo de per'#237'odo'
          Columns = 3
          ItemIndex = 0
          Items.Strings = (
            'Emiss'#227'o'
            'Vencimento'
            'Pagamento')
          TabOrder = 1
          OnClick = rgPeriodoClick
        end
        object edtDataIni: TJvDateEdit
          Left = 491
          Top = 30
          Width = 93
          Height = 21
          CheckOnExit = True
          TabOrder = 2
        end
        object edtDataFim: TJvDateEdit
          Left = 612
          Top = 30
          Width = 94
          Height = 21
          CheckOnExit = True
          TabOrder = 3
        end
      end
      object GroupBox2: TGroupBox
        Left = 0
        Top = 73
        Width = 1024
        Height = 426
        Align = alClient
        Caption = 'Lista de lan'#231'amentos'
        TabOrder = 1
        object DBGridLancamentos: TDBGrid
          Left = 2
          Top = 15
          Width = 1020
          Height = 289
          Align = alClient
          DataSource = dsTbltap
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'Tahoma'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'tapcod'
              Title.Alignment = taRightJustify
              Title.Caption = 'C'#243'digo'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'tapnrodoc'
              Title.Caption = 'Nro.Documento'
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'tapdescr'
              Title.Caption = 'Descri'#231#227'o do documento'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'tapdtemis'
              Title.Alignment = taCenter
              Title.Caption = 'Data Emiss'#227'o'
              Width = 73
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'tapdtvenc'
              Title.Alignment = taCenter
              Title.Caption = 'Data Vencimento'
              Width = 87
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'tapvldoc'
              Title.Alignment = taRightJustify
              Title.Caption = 'Valor do documento'
              Width = 111
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'tapvljuros'
              Title.Alignment = taRightJustify
              Title.Caption = 'Valor de juros'
              Width = 80
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'tapvlmulta'
              Title.Alignment = taRightJustify
              Title.Caption = 'Valor de multa'
              Width = 80
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'tapvldesc'
              Title.Alignment = taRightJustify
              Title.Caption = 'Valor de desc.'
              Width = 80
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'tapvlpagto'
              Title.Alignment = taRightJustify
              Title.Caption = 'Valor de pagto'
              Visible = True
            end
            item
              Alignment = taCenter
              Expanded = False
              FieldName = 'tapdtpagto'
              Title.Alignment = taCenter
              Title.Caption = 'Data Pagto'
              Width = 73
              Visible = True
            end>
        end
        object GroupBox6: TGroupBox
          Left = 2
          Top = 304
          Width = 1020
          Height = 120
          Align = alBottom
          Caption = 'Detalhes do lan'#231'amento'
          TabOrder = 1
          object Label21: TLabel
            Left = 14
            Top = 24
            Width = 102
            Height = 13
            Caption = 'Forma de pagamento'
          end
          object Label22: TLabel
            Left = 289
            Top = 24
            Width = 29
            Height = 13
            Caption = 'Banco'
          end
          object Label23: TLabel
            Left = 14
            Top = 68
            Width = 41
            Height = 13
            Caption = 'Hist'#243'rico'
            FocusControl = DBEdit9
          end
          object DBEdit9: TDBEdit
            Left = 14
            Top = 84
            Width = 525
            Height = 21
            TabStop = False
            Color = clBtnFace
            DataField = 'taphist'
            DataSource = dsTbltap
            ReadOnly = True
            TabOrder = 0
          end
          object DBEdit10: TDBEdit
            Left = 289
            Top = 40
            Width = 250
            Height = 21
            TabStop = False
            Color = clBtnFace
            DataField = 'LookupBandescr'
            DataSource = dsTbltap
            ReadOnly = True
            TabOrder = 1
          end
          object DBEdit11: TDBEdit
            Left = 14
            Top = 40
            Width = 250
            Height = 21
            TabStop = False
            Color = clBtnFace
            DataField = 'LookupFdpdescr'
            DataSource = dsTbltap
            ReadOnly = True
            TabOrder = 2
          end
        end
      end
      object Panel1: TPanel
        Left = 0
        Top = 499
        Width = 1024
        Height = 41
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 2
        object DBNavigator: TDBNavigator
          Left = 2
          Top = 4
          Width = 280
          Height = 29
          DataSource = dsTbltap
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
          Kind = dbnHorizontal
          TabOrder = 0
        end
        object btnNovo: TJvImgBtn
          Left = 304
          Top = 6
          Width = 75
          Height = 25
          Caption = 'Novo'
          ImageIndex = 0
          Images = frmPrincipal.ImageList16
          TabOrder = 1
          OnClick = btnNovoClick
          HotTrackFont.Charset = DEFAULT_CHARSET
          HotTrackFont.Color = clWindowText
          HotTrackFont.Height = -11
          HotTrackFont.Name = 'Tahoma'
          HotTrackFont.Style = []
        end
        object btnEditar: TJvImgBtn
          Left = 385
          Top = 6
          Width = 75
          Height = 25
          Caption = 'Editar'
          ImageIndex = 1
          Images = frmPrincipal.ImageList16
          TabOrder = 2
          OnClick = btnEditarClick
          HotTrackFont.Charset = DEFAULT_CHARSET
          HotTrackFont.Color = clWindowText
          HotTrackFont.Height = -11
          HotTrackFont.Name = 'Tahoma'
          HotTrackFont.Style = []
        end
        object btnExcluir: TJvImgBtn
          Left = 466
          Top = 6
          Width = 75
          Height = 25
          Caption = 'Excluir'
          ImageIndex = 2
          Images = frmPrincipal.ImageList16
          TabOrder = 3
          OnClick = btnExcluirClick
          HotTrackFont.Charset = DEFAULT_CHARSET
          HotTrackFont.Color = clWindowText
          HotTrackFont.Height = -11
          HotTrackFont.Name = 'Tahoma'
          HotTrackFont.Style = []
        end
        object btnBaixa: TJvImgBtn
          Left = 570
          Top = 6
          Width = 75
          Height = 25
          Caption = 'Baixa'
          ImageIndex = 6
          Images = frmPrincipal.ImageList16
          TabOrder = 4
          OnClick = btnBaixaClick
          HotTrackFont.Charset = DEFAULT_CHARSET
          HotTrackFont.Color = clWindowText
          HotTrackFont.Height = -11
          HotTrackFont.Name = 'Tahoma'
          HotTrackFont.Style = []
        end
      end
    end
    object TabSheet1: TTabSheet
      Caption = 'Lan'#231'amento'
      OnShow = TabSheet1Show
      ExplicitLeft = 52
      ExplicitTop = 48
      ExplicitWidth = 0
      ExplicitHeight = 0
      object Label29: TLabel
        Left = 422
        Top = 3
        Width = 145
        Height = 16
        Caption = '* Campos obrigat'#243'rios'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label1: TLabel
        Left = 24
        Top = 24
        Width = 78
        Height = 13
        Caption = 'Nro. Documento'
        FocusControl = DBEdit1
      end
      object Label4: TLabel
        Left = 24
        Top = 80
        Width = 117
        Height = 13
        Caption = 'Descri'#231#227'o do documento'
        FocusControl = DBEdit6
      end
      object Label6: TLabel
        Left = 24
        Top = 137
        Width = 64
        Height = 13
        Caption = 'Data emiss'#227'o'
      end
      object Label7: TLabel
        Left = 24
        Top = 198
        Width = 95
        Height = 13
        Caption = 'Valor do documento'
        FocusControl = DBEdit8
      end
      object Label9: TLabel
        Left = 24
        Top = 256
        Width = 102
        Height = 13
        Caption = 'Forma de pagamento'
        FocusControl = DBLookupComboBox1
      end
      object Label3: TLabel
        Left = 194
        Top = 137
        Width = 81
        Height = 13
        Caption = 'Data vencimento'
      end
      object Label28: TLabel
        Left = 527
        Top = 101
        Width = 8
        Height = 16
        Caption = '*'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label2: TLabel
        Left = 127
        Top = 158
        Width = 18
        Height = 16
        AutoSize = False
        Caption = '*'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label8: TLabel
        Left = 297
        Top = 158
        Width = 18
        Height = 16
        AutoSize = False
        Caption = '*'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label12: TLabel
        Left = 147
        Top = 219
        Width = 18
        Height = 16
        AutoSize = False
        Caption = '*'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label13: TLabel
        Left = 223
        Top = 277
        Width = 18
        Height = 16
        AutoSize = False
        Caption = '*'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Panel2: TPanel
        Left = 0
        Top = 499
        Width = 1024
        Height = 41
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 6
        object btnOk: TBitBtn
          Left = 24
          Top = 8
          Width = 75
          Height = 25
          Caption = 'OK'
          Glyph.Data = {
            DE010000424DDE01000000000000760000002800000024000000120000000100
            0400000000006801000000000000000000001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            3333333333333333333333330000333333333333333333333333F33333333333
            00003333344333333333333333388F3333333333000033334224333333333333
            338338F3333333330000333422224333333333333833338F3333333300003342
            222224333333333383333338F3333333000034222A22224333333338F338F333
            8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
            33333338F83338F338F33333000033A33333A222433333338333338F338F3333
            0000333333333A222433333333333338F338F33300003333333333A222433333
            333333338F338F33000033333333333A222433333333333338F338F300003333
            33333333A222433333333333338F338F00003333333333333A22433333333333
            3338F38F000033333333333333A223333333333333338F830000333333333333
            333A333333333333333338330000333333333333333333333333333333333333
            0000}
          ModalResult = 1
          NumGlyphs = 2
          TabOrder = 0
          OnClick = btnOkClick
        end
        object btnCancelar: TBitBtn
          Left = 105
          Top = 8
          Width = 75
          Height = 25
          Caption = 'Cancelar'
          Kind = bkCancel
          NumGlyphs = 2
          TabOrder = 1
          OnClick = btnCancelarClick
        end
      end
      object DBEdit1: TDBEdit
        Left = 24
        Top = 40
        Width = 145
        Height = 21
        DataField = 'tapnrodoc'
        DataSource = dsTbltap
        TabOrder = 0
      end
      object DBEdit6: TDBEdit
        Left = 24
        Top = 96
        Width = 497
        Height = 21
        DataField = 'tapdescr'
        DataSource = dsTbltap
        TabOrder = 1
      end
      object DBEdit8: TDBEdit
        Left = 24
        Top = 214
        Width = 117
        Height = 21
        DataField = 'tapvldoc'
        DataSource = dsTbltap
        TabOrder = 4
      end
      object DBLookupComboBox1: TDBLookupComboBox
        Left = 24
        Top = 272
        Width = 193
        Height = 21
        DataField = 'fdpcod'
        DataSource = dsTbltap
        KeyField = 'fdpcod'
        ListField = 'fdpdescr'
        ListSource = dsTblfdp
        TabOrder = 5
      end
      object JvDBDateEdit1: TJvDBDateEdit
        Left = 24
        Top = 153
        Width = 97
        Height = 21
        DataField = 'tapdtemis'
        DataSource = dsTbltap
        CheckOnExit = True
        TabOrder = 2
      end
      object JvDBDateEdit2: TJvDBDateEdit
        Left = 194
        Top = 153
        Width = 97
        Height = 21
        DataField = 'tapdtvenc'
        DataSource = dsTbltap
        CheckOnExit = True
        TabOrder = 3
      end
    end
  end
  object TimerInicio: TTimer
    Interval = 50
    OnTimer = TimerInicioTimer
    Left = 628
    Top = 169
  end
  object dsTbltap: TDataSource
    DataSet = dmDadosContasPagar.cdsTbltap
    Left = 444
    Top = 201
  end
  object dsTblfdp: TDataSource
    DataSet = dmDadosContasPagar.cdsTblfdp
    Left = 444
    Top = 328
  end
end
